==============================================
Sprite Changes Back to Class Default
==============================================

Sub Main(Player as Long)

If GetPlayerSprite(Player) <> # Then
   SetPlayerSprite(Player, #)
Else
   SetPlayerSprite(Player, 0)
End If

End Sub